(widget-checkbox-action): Clear undo info.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 55938b451702e9841aa6e804f21aff281a8b6436..20369d7a331a1124d9aa8fb0050f92e0fb0339c4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-12-17  Martin Rudalics  <rudalics@gmx.at>  (tiny change)
+
+       * wid-edit.el (widget-checkbox-action): Clear undo info.
+
 2005-12-16  Bill Wohler  <wohler@newt.com>
 
        * menu-bar.el (kill-this-buffer): Set a good example by using menu

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index b6dc9470d2cabdbb74469a7da7e36140d70a6581..ec3614c4d596f0ba7d9b8d0d02a71c86f8d469b5 100644 (file)
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -2161,7 +2161,8 @@ when he invoked the menu."
     (when sibling
       (if (widget-value widget)
          (widget-apply sibling :activate)
-       (widget-apply sibling :deactivate)))))
+       (widget-apply sibling :deactivate))
+      (widget-clear-undo))))
 
 ;;; The `checklist' Widget.